home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / latex209 / contrib / nl-brief / brief.sty < prev    next >
Text File  |  1991-06-08  |  55KB  |  679 lines
  1. % This is BRIEF.STY in text format                                              
  2. % a letter style following Dutch NEN-norms 1025, 1026, and 3162.                
  3. \def\stijlversie{1.06}\def\stijldatum{24 maart 1991}                            
  4. % Een Nederlandse briefstijl.                                                   
  5. % Deze stijl bevat meer commando's dan de LaTeX 'letter' stijl,                 
  6. % maar op geforceerde wijze (zie het einde van dit bestand)                     
  7. % is ervoor gezorgd dat een brief die met 'letter' gemaakt is,                  
  8. % ook door 'brief' kan rollen. Omgekeerd kan dus niet.                          
  9. %                                                                               
  10. % Auteur:                                                                       
  11. %    Victor Eijkhout                                                            
  12. %    Center for Supercomputing Research and Development                         
  13. %    University of Illinois at Urbana-Champaign                                 
  14. %    305 Talbot Lab                                                             
  15. %    104 South Wright Street                                                    
  16. %    Urbana, Illinois 61801, USA                                                
  17. %                                                                               
  18. %    eijkhout@csrd.uiuc.edu                                                     
  19. %                                                                               
  20. % History:                                                                      
  21. % 1.02 \language omgedoopt tot \b@language                                      
  22. % 1.03 USletter optie voor 11'' briefpapier                                     
  23. %      enkele Duitse termen verbeterd (met dank aan Marc van Woerkom)           
  24. % 1.04 Engelse vertaling van termen die niet in 'letter.sty'                    
  25. %      voorkomen                                                                
  26. % 1.05 Franse termen toegevoegd (met dank aan Christophe van Zwynsvoorde)       
  27.                                                                                 
  28. \typeout{Document Stijl 'Brief'. Versie <\stijlversie>, <\stijldatum>}          
  29.                                                                                 
  30. \def\@ptsize{1}                                                                 
  31. \@namedef{ds@10pt}{\def\@ptsize{0}}                                             
  32. \@namedef{ds@11pt}{\def\@ptsize{1}}                                             
  33. \@namedef{ds@12pt}{\def\@ptsize{2}}                                             
  34. \@twosidefalse                                                                  
  35. \def\ds@draft{\overfullrule 5pt}                                                
  36.                                                                                 
  37. \def\ds@USletter{\@elfinchtrue} \newif\if@elfinch                               
  38. \@namedef{ds@a4}{\message{De A4-optie is niet nodig:                            
  39. de briefstijl doet de papierafmetingen zelf.}}                                  
  40. \def\ds@sober{}                                                                 
  41.                                                                                 
  42. \def\ds@typhulp{\@typhulptrue} \newif\if@typhulp                                
  43. \def\ds@streepjes{\@streepjestrue} \newif\if@streepjes                          
  44. \def\ds@adresrechts{\@adresrechtstrue} \newif\if@adresrechts                    
  45.                                                                                 
  46. \newcount\b@language                                                            
  47. \b@language=0 % Nederlands                                                      
  48. \def\ds@engels{\b@language=1 }                                                  
  49. \def\ds@USengels{\b@language=2 }                                                
  50. \def\ds@duits{\b@language=3 }                                                   
  51. \def\ds@frans{\b@language=4 }                                                   
  52.                                                                                 
  53. \@options                                                                       
  54.                                                                                 
  55. \lineskip 1pt \normallineskip 1pt                                               
  56. \def\baselinestretch{1}                                                         
  57.                                                                                 
  58. %%%%%%%%%%%%%%%%%%%%%%% point size %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%            
  59. \ifcase \@ptsize\relax                                                          
  60. \def\@normalsize{\@setsize\normalsize{12pt}\xpt\@xpt                            
  61. \abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip      
  62. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt minus3pt}  
  63. \def\small{\@setsize\small{11pt}\ixpt\@ixpt                                     
  64. \abovedisplayskip 8.5pt plus 3pt minus 4pt\belowdisplayskip \abovedisplayskip   
  65. \abovedisplayshortskip \z@ plus2pt\belowdisplayshortskip 4pt plus2pt minus 2pt} 
  66. \def\footnotesize{\@setsize\footnotesize{9.5pt}\viiipt\@viiipt                  
  67. \abovedisplayskip 6pt plus 2pt minus 4pt\belowdisplayskip \abovedisplayskip     
  68. \abovedisplayshortskip \z@ plus 1pt\belowdisplayshortskip 3pt plus 1pt minus    
  69. 2pt}                                                                            
  70. \def\scriptsize{\@setsize\scriptsize{8pt}\viipt\@viipt}                         
  71. \def\tiny{\@setsize\tiny{6pt}\vpt\@vpt}                                         
  72. \def\large{\@setsize\large{14pt}\xiipt\@xiipt}                                  
  73. \def\Large{\@setsize\Large{18pt}\xivpt\@xivpt}                                  
  74. \def\LARGE{\@setsize\LARGE{22pt}\xviipt\@xviipt}                                
  75. \def\huge{\@setsize\huge{25pt}\xxpt\@xxpt}                                      
  76. \def\Huge{\@setsize\Huge{30pt}\xxvpt\@xxvpt}                                    
  77. \or                                                                             
  78. \def\@normalsize{\@setsize\normalsize{13.6pt}\xipt\@xipt                        
  79. \abovedisplayskip 11pt plus3pt minus6pt\belowdisplayskip \abovedisplayskip      
  80. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt        
  81. minus3pt}                                                                       
  82. \def\small{\@setsize\small{12pt}\xpt\@xpt                                       
  83. \abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip      
  84. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt minus3pt}  
  85. \def\footnotesize{\@setsize\footnotesize{11pt}\ixpt\@ixpt                       
  86. \abovedisplayskip 8pt plus 2pt minus 4pt\belowdisplayskip \abovedisplayskip     
  87. \abovedisplayshortskip \z@ plus 1pt\belowdisplayshortskip 4pt plus 2pt minus    
  88. 2pt}                                                                            
  89. \def\scriptsize{\@setsize\scriptsize{9.5pt}\viiipt\@viiipt}                     
  90. \def\tiny{\@setsize\tiny{7pt}\vipt\@vipt}                                       
  91. \def\large{\@setsize\large{14pt}\xiipt\@xiipt}                                  
  92. \def\Large{\@setsize\Large{18pt}\xivpt\@xivpt}                                  
  93. \def\LARGE{\@setsize\LARGE{22pt}\xviipt\@xviipt}                                
  94. \def\huge{\@setsize\huge{25pt}\xxpt\@xxpt}                                      
  95. \def\Huge{\@setsize\Huge{30pt}\xxvpt\@xxvpt}                                    
  96. \or                                                                             
  97. \def\@normalsize{\@setsize\normalsize{15pt}\xiipt\@xiipt                        
  98. \abovedisplayskip 12pt plus3pt minus7pt\belowdisplayskip \abovedisplayskip      
  99. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt        
  100. minus3pt}                                                                       
  101. \def\small{\@setsize\small{13.6pt}\xipt\@xipt                                   
  102. \abovedisplayskip 11pt plus3pt minus6pt\belowdisplayskip \abovedisplayskip      
  103. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt        
  104. minus3pt}                                                                       
  105. \def\footnotesize{\@setsize\footnotesize{12pt}\xpt\@xpt                         
  106. \abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip      
  107. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt minus3pt}  
  108. \def\scriptsize{\@setsize\scriptsize{9.5pt}\viiipt\@viiipt}                     
  109. \def\tiny{\@setsize\tiny{7pt}\vipt\@vipt}                                       
  110. \def\large{\@setsize\large{18pt}\xivpt\@xivpt}                                  
  111. \def\Large{\@setsize\Large{22pt}\xviipt\@xviipt}                                
  112. \def\LARGE{\@setsize\LARGE{25pt}\xxpt\@xxpt}                                    
  113. \def\huge{\@setsize\huge{30pt}\xxvpt\@xxvpt}                                    
  114. \let\Huge=\huge                                                                 
  115. \fi                                                                             
  116. \normalsize                                                                     
  117.                                                                                 
  118. %%%%%%%%%%%%%%%%%%%%%% Paper Size %%%%%%%%%%%%%%%%%%%%%%%%%%                    
  119. %V forceer 33mm linker marge                                                    
  120. \oddsidemargin=7.6mm \evensidemargin=\oddsidemargin                             
  121.                                                                                 
  122. %V rechter marge is volgens NEN 10mm; voor symmetrie lijkt 33 mij beter.        
  123. \textwidth=144mm \@rightskip=0cm plus 5cm \rightskip=\@rightskip                
  124. %V geen margin notes.                                                           
  125. \marginparwidth=0pt \marginparsep=0pt \marginparpush=0pt                        
  126.                                                                                 
  127. %V aan de bovenkant een marge van 13mm                                          
  128. \topmargin-12.4mm                                                               
  129. %V het briefhoofd komt tot 50mm van de bovenkant van het papier                 
  130. \headheight=37mm \headsep=0mm                                                   
  131. %V text height is wat er over is                                                
  132. %\textheight=217mm %V dit kan vast beter.                                       
  133.                                                                                 
  134. \textheight=197mm %V op het timmermansoog                                       
  135. \if@elfinch \advance\textheight by -17.6mm \fi                                  
  136.                                                                                 
  137. %V geef de gebruiker de gelegenheid andere vensters te specificeren             
  138. \newdimen\vensterskip \vensterskip=50mm %% de standaard                         
  139. \newdimen\@vensterskip                                                          
  140. \newdimen\@firstheadheight \newdimen\@otherheadheight                           
  141. \newdimen\@othertextheight                                                      
  142. \newdimen\@otherheadsep \newdimen\@vervolgsep                                   
  143. \@otherheadsep=2mm                                                              
  144. % vervolgbladen zouden daar geen last van moeten hebben, maar ik weet           
  145. % nog niet hoe ik dat voor elkaar moet krijgen.                                 
  146. %\@otherheadheight=\headheight \@othertextheight=\textheight                    
  147. \def\@prepareerhoofden{\@vensterskip=\vensterskip                               
  148.     \advance\@vensterskip by -50mm                                              
  149.     %\advance\headheight by \@vensterskip  % werkt niet                         
  150.     %\advance\textheight by -\@vensterskip}                                     
  151.     \@firstheadheight=\headheight                                               
  152.     \@otherheadheight=\headheight %deze moet hier eigenlijk niet                
  153.     \@othertextheight=\textheight %idem                                         
  154.     }                                                                           
  155.                                                                                 
  156. %V voldoende scheiding tussen tekst en voetregel                                
  157. \newdimen\footsep \footsep=1.5cm %%analoog aan headsep                          
  158. %\footheight 12pt \footskip25pt %worden elders gezet.                           
  159.                                                                                 
  160.                                                                                 
  161. \columnsep 10pt \columnseprule 0pt %V twee koloms brieven? belachelijk!         
  162. %%\flushbottom                                                                  
  163. \raggedbottom %% hm! zonder raggedbottom gaat het slot mis.                     
  164.                                                                                 
  165. %%%%%%%%%%%%%V we'll get to this later                                          
  166. \footnotesep 12pt \skip\footins 10pt plus 2pt minus 4pt                         
  167. \floatsep 12pt plus 2pt minus 2pt                                               
  168. \textfloatsep 20pt plus 2pt minus 4pt                                           
  169. \intextsep 12pt plus 2pt minus 2pt                                              
  170. \dblfloatsep 12pt plus 2pt minus 2pt                                            
  171. \dbltextfloatsep 20pt plus 2pt minus 4pt                                        
  172. \@maxsep 20pt                                                                   
  173. \@dblmaxsep 20pt                                                                
  174. \@fptop 0pt plus 1fil                                                           
  175. \@fpsep 8pt plus 2fil                                                           
  176. \@fpbot 0pt plus 1fil                                                           
  177. \@dblfptop 0pt plus 1fil                                                        
  178. \@dblfpsep 8pt plus 2fil                                                        
  179. \@dblfpbot 0pt plus 1fil                                                        
  180.                                                                                 
  181. %%%%%%%%%%%%%%%%%%%%%%%%%%% opening / afsluiting %%%%%%%%%%%%%%%%%%%%%          
  182. \font\refkopfont=cmssq8                                                         
  183. \font\kleinvet=cmbx7                                                            
  184.                                                                                 
  185. \def\opening#1{\thispagestyle{firstpage}                                        
  186.                \adresveld                                                       
  187.                \prevdepth=-1000pt \vskip-2pt %% ????                            
  188.                \referentieregel                                                 
  189.                \@dosubject #1\par\nobreak}                                      
  190. \def\ondertekening#1{\def\fromsig{#1}}\def\fromsig{}                            
  191. %V een aanzienlijke verbetering op de LL constructie: nu kun je                 
  192. %V de ondertekening na de afsluiting geven.                                     
  193. \long\def\afsluiting#1{\par\nobreak\vspace{\parskip}                            
  194.  \stopbreaks \noindent                                                          
  195.  \ifx\@empty\fromsig                                                            
  196.      \def\ondertekening##1{\def\fromsig{##1}                                    
  197.          \parbox{.5\textwidth}{\raggedright                                     
  198.                  \ignorespaces #1\\[6\medskipamount] \fromsig \strut}}          
  199.  \else \parbox{.5\textwidth}{\raggedright                                       
  200.          \ignorespaces #1\\[6\medskipamount]                                    
  201.          \fromsig \strut}                                                       
  202.  \fi \par}                                                                      
  203.                                                                                 
  204. \def\betreft#1{\def\@subject{#1}} \def\@subject{}                               
  205. \def\@dosubject{\ifx\@empty\@subject                                            
  206.     \else \par\noindent                                                         
  207.     \parbox[t]{\textwidth}{\@hangfrom{\refkopfont \betrefttekst                 
  208.     \enspace}\rm\ignorespaces \@subject\strut}\par\fi}                          
  209. \def\ps{\par\startbreaks}                                                       
  210. \def\cc#1{\par\noindent                                                         
  211.     \parbox[t]{\textwidth}{\@hangfrom{\rm cc: }\ignorespaces                    
  212.     #1\strut}\par}                                                              
  213. \def\bijlage#1{\par\noindent                                                    
  214.     \parbox[t]{\textwidth}{\@hangfrom{\rm \bijlagetekst\ }\ignorespaces         
  215.     #1\strut}\par}                                                              
  216. \def\bijlagen#1{\par\noindent                                                   
  217.     \parbox[t]{\textwidth}{\@hangfrom{\rm \bijlagentekst\ }\ignorespaces        
  218.     #1\strut}\par}                                                              
  219. \def\stopletter{}                                                               
  220.                                                                                 
  221.                                                                                 
  222.                                                                                 
  223. \long\def\brief#1{\newpage                                                      
  224.  \c@page\@ne                                                                    
  225.  \interlinepenalty=200 \@processto{#1}                                          
  226.  \@defrefveld{\@Ad}{\geadresseerdetekst}{\toname}                               
  227. %% een truc voor de datum: alleen als de gebruiker helemaal niets               
  228. %  gezegd heeft krijgt hij \vandaag.                                            
  229.  \ifdim\wd\@Dt=0cm \@defrefveld{\@Dt}{\datumtekst}{\vandaag}\fi                 
  230. %% misschien heeft de gebruiker een afwijkende vensterenvelop,                  
  231. %  en heeft hij dat opgegeven;                                                  
  232. %  er kan dus nu pas de hoogte van het hoofd bepaald worden.                    
  233.  \@prepareerhoofden %(lijkt wel een koppensnellersritueel)                      
  234. %% misschien headheight opvoeren en textheight verminderen                      
  235. %  voor de vervolgbladen. Nb: op het eerste blad mag niet met                   
  236. %  de textheight geklooid worden, omdat dan het adres op de                     
  237. %  verkeerde hoogte kan komen.                                                  
  238.  {\setbox\@tempboxa=\vervolghoofd                                               
  239.   \@tempdima=\ht\@tempboxa                                                      
  240.   \advance\@tempdima by -\@otherheadheight                                      
  241.   \ifdim\@tempdima>0cm                                                          
  242.         \global\advance\@otherheadheight by \@tempdima                          
  243.         \global\advance\@othertextheight by -\@tempdima \fi}                    
  244. %% idem voetregel bekijken                                                      
  245.  {\setbox\@tempboxa=\vbox{\voetregel}                                           
  246.   \global\footskip=\ht\@tempboxa %%moet de teksthoogte niet minder worden?      
  247.   \global\advance\footskip by \footsep}                                         
  248.  } %V maar niet als die er als is!!!                                            
  249.                                                                                 
  250. \def\endbrief{\stopletter\@@par\pagebreak\@@par                                 
  251.  \if@filesw \begingroup                                                         
  252.      \def\protect{\string} \let\\=\relax                                        
  253.      \def\protect##1{\string##1\space}                                          
  254.      \immediate\write\@auxout{\string\mlabel{\returnaddress}{\toname            
  255.      \\\toaddress}}                                                             
  256.  \endgroup \fi                                                                  
  257.  }                                                                              
  258.                                                                                 
  259. \long\def\@processto#1{\@xproc #1\\@@@\ifx\toaddress\@empty                     
  260.  \else \@yproc #1@@@\fi}                                                        
  261. \long\def\@xproc #1\\#2@@@{\def\toname{#1}\def\toaddress{#2}}                   
  262. \long\def\@yproc #1\\#2@@@{\def\toaddress{#2}}                                  
  263. \def\stopbreaks{\interlinepenalty \@M                                           
  264.  \def\par{\@@par\nobreak}\let\\=\@nobreakcr                                     
  265.  \let\vspace\@nobreakvspace}                                                    
  266. \def\@nobreakvspace{\@ifstar{\@nobreakvspacex}{\@nobreakvspacex}}               
  267. \def\@nobreakvspacex#1{\ifvmode\nobreak\vskip #1\relax\else                     
  268.  \@bsphack\vadjust{\nobreak\vskip #1}\@esphack\fi}                              
  269. \def\@nobreakcr{\vadjust{\penalty\@M}\@ifstar{\@xnewline}{\@xnewline}}          
  270. \def\startbreaks{\let\\=\@normalcr                                              
  271.  \interlinepenalty 200\relax                                                    
  272.  \def\par{\@@par\penalty 200\relax}}                                            
  273.                                                                                 
  274. % relieken van 'letter'. worden niet gebruikt.                                  
  275. \def\name#1{\def\fromname{#1}}                                                  
  276. \long\def\address#1{\def\fromaddress{#1}}\def\fromaddress{}                     
  277. \def\location#1{\def\fromlocation{#1}}\def\fromlocation{}                       
  278. \def\telephone#1{\def\telephonenum{#1}}\def\telephonenum{}                      
  279. \def\returnaddress{}                                                            
  280.                                                                                 
  281. \def\document{\endgroup                                                         
  282.  \@colht\textheight \@colroom\textheight \vsize\textheight                      
  283.  \columnwidth\textwidth \@clubpenalty\clubpenalty                               
  284.  \if@twocolumn \advance\columnwidth -\columnsep                                 
  285.  \divide\columnwidth\tw@ \hsize\columnwidth \@firstcolumntrue                   
  286.  \fi                                                                            
  287.  \hsize\columnwidth \linewidth\hsize                                            
  288.  \begingroup\@floatplacement\@dblfloatplacement\endgroup                        
  289.  \if@filesw \immediate\openout\@mainaux=\jobname.aux                            
  290.  \immediate\write\@mainaux{\string\startlabels\string\@startlabels}\fi          
  291.  \def\do##1{\let ##1\@notprerr}                                                 
  292.  \@preamblecmds                                                                 
  293.  \let\do\noexpand                                                               
  294.  \@normalsize\everypar{}}                                                       
  295. \def\enddocument{\@checkend{document}\newpage\begingroup                        
  296.  \if@filesw \immediate\closeout\@mainaux                                        
  297.  \makeatletter\input \jobname.aux\clearpage                                     
  298.  \fi\endgroup\deadcycles\z@\@@end}                                              
  299.                                                                                 
  300. \def\makelabels{\@fileswtrue}\let\maaketiketten=\makelabels                     
  301. \def\@startlabels{}                                                             
  302. \newcount\labelcount                                                            
  303.                                                                                 
  304. %%%%%%%%%%%%%%%%%%%%%%%% adresveld %%%%%%%%%%%%%%%%%%%%%%%%%%%%%                
  305. \newdimen\adresveldbreedte                                                      
  306. \newif\if@antwoordadres                                                         
  307. \def\antwoordadres#1{\@antwoordadrestrue\def\@antwoordadres{#1}}                
  308. \def\@antwoordadres{}                                                           
  309. \def\adresveld{\hbox{}\kern-\topskip                                            
  310.     \kern\@vensterskip                                                          
  311.     \bgroup\baselineskip=0pt %% dit voorkomt tonnen problemen.                  
  312.            \lineskip=0pt     %% tonnetjes.                                      
  313.      \if@adresrechts \adresveldbreedte=4\refveldbreedte                         
  314.          \advance\adresveldbreedte by -76mm                                     
  315.          \def\@tempa{\moveright 76mm}                                           
  316.          \else \let\@tempa\relax \adresveldbreedte=83mm\fi                      
  317.      \setbox\@tempboxa= % geadresseerde plus adres                              
  318.             \vtop{\hsize=\adresveldbreedte \@normalsize                         
  319.                   \rightskip=0cm plus \adresveldbreedte                         
  320.                   \let\\=\@nobreakcr \toname \\ \toaddress}                     
  321.      \if@antwoordadres\@tempa\vbox to 0cm{                                      
  322.             \hbox to \adresveldbreedte{\kleinvet                                
  323.             \def\\{\unskip\enspace$\bullet$\enspace\ignorespaces}%              
  324.             \@antwoordadres\hfil}\kern2pt                                       
  325.             \hrule \vss}\fi                                                     
  326.      \if@typhulp \@tempa\llap{\vbox to 0cm                                      
  327.                     {\vskip9mm\streepje\vss}} \fi                               
  328.      \kern9mm \kern-\ht\@tempboxa \@tempdima=\dp\@tempboxa                      
  329.      \@tempa\box\@tempboxa \kern-\@tempdima                                     
  330.      \vskip31mm                                                                 
  331.     \egroup}                                                                    
  332.                                                                                 
  333.                                                                                 
  334. %%%%%%%%%%%%%%%%%%%%%% referentieregel %%%%%%%%%%%%%%%%%%%%%%%%%%               
  335. \newdimen\refveldbreedte                                                        
  336. \refveldbreedte=38mm %% 3/2 inch. zie NEN 3516                                  
  337.                                                                                 
  338. \def\@defrefveld#1#2#3{\setbox#1=\@refveld{#2}{#3}}                             
  339. \def\@refveld#1#2{\vtop{\hsize=\refveldbreedte \parskip=0cm                     
  340.                         \everypar{}%V dan kan dit in preamble!!                 
  341.                         \lineskiplimit=\z@ \baselineskip=12pt                   
  342.                         \lineskip=\z@                                           
  343.                         \rightskip=0cm plus \refveldbreedte                     
  344.                                        minus .5\refveldbreedte                  
  345.                         \vbox{\refkopfont\baselineskip=10pt                     
  346.                               #1\@@par}\kern2pt                                 
  347.                         \strut #2}}                                             
  348.                                                                                 
  349. %V referenties blijven bewaard als er meer dan 'e'en brief in                   
  350. %V een bestand staat.                                                           
  351. \newbox\@UB \newbox\@UK \newbox\@OK \newbox\@Dt                                 
  352. \def\uwbriefvan#1{\@defrefveld{\@UB}{\uwbrieftekst}{#1}}                        
  353. \def\uwkenmerk #1{\@defrefveld{\@UK}{\uwkenmerktekst}{#1}}                      
  354. \def\onskenmerk#1{\@defrefveld{\@OK}{\onskenmerktekst}{#1}}                     
  355. \def\datum#1{\def\@tempa{}\def\@tempb{#1}\ifx\@tempa\@tempb                     
  356.     \setbox\@Dt\hbox{ }\else\@defrefveld{\@Dt}{\datumtekst}{#1}\fi}             
  357. %V Datum word geinitialiseerd op \vandaag in \brief                             
  358. %V als de gebruiker verder niets doet, als hij een leeg argument opgeeft        
  359. %V verschijnt er in het geheel geen datum.                                      
  360.                                                                                 
  361. \def\referentieregel{\hbox                                                      
  362.              {\hbox to \refveldbreedte{\copy\@UB\hfil}%                         
  363.               \hbox to \refveldbreedte{\copy\@UK\hfil}%                         
  364.               \hbox to \refveldbreedte{\copy\@OK\hfil}%                         
  365.               \hbox to \refveldbreedte{\copy\@Dt\hfil}\hss}}                    
  366.                                                                                 
  367. \newbox\@Ad %V Geadresseerde: geinitialiseerd in \brief                         
  368. \def\vervolgreferentieregel{\hbox                                               
  369.              {\hbox to \refveldbreedte{\copy\@Ad\hfil}%                         
  370.               \hskip\refveldbreedte                                             
  371.               \hbox to \refveldbreedte{\copy\@Dt\hfil}%                         
  372.               \@refveld{\bladnummertekst}{\thepage}\hss}}                       
  373.                                                                                 
  374. %%%%%%%%%%%%%%%%%%%%%%%%% headers / footers %%%%%%%%%%%%%%%%%%%%%%%             
  375. \def\briefhoofd{}\def\vervolghoofd{\vbox{}}                                     
  376. \def\maakbriefhoofd                                                             
  377.    {\@ifstar {\@kortvervolgbriefhoofd}{\@langvervolgbriefhoofd}}                
  378. \def\@kortvervolgbriefhoofd                                                     
  379.    #1#2{                                                                        
  380.     \@maakbriefhoofd{#1}{#2}                                                    
  381.     \def\vervolghoofd{\vbox{\hsize=4\refveldbreedte                             
  382.                          \hbox to \hsize{\Large \sf #1\strut\hfil}              
  383.                          \hrule \kern2mm \vervolgreferentieregel}}}             
  384. \def\@langvervolgbriefhoofd                                                     
  385.    #1#2{                                                                        
  386.     \@maakbriefhoofd{#1}{#2}                                                    
  387.     \def\vervolghoofd{\vbox{\briefhoofd\vskip2mm                                
  388.                         \vervolgreferentieregel                                 
  389.                         \vbox{}}}}                                              
  390. \def\@maakbriefhoofd#1#2{\def\briefhoofd{%                                      
  391.        \vbox{\hsize=4\refveldbreedte                                            
  392.              \hbox to \hsize{\Large \sf #1\strut\hfil}                          
  393.              \hrule                                                             
  394.              \moveright 3\refveldbreedte\@refveld{\strut #2}{}                  
  395.              \vbox{}}}}                                                         
  396. \newbox\@voetruimte \setbox\@voetruimte=\hbox{}                                 
  397. \newcount\@voetteller                                                           
  398. \def\voetregel{\copy\@voetruimte}                                               
  399. \def\voetitem#1#2{\advance\@voetteller by 1                                     
  400.     \setbox\@voetruimte=\hbox to 4\refveldbreedte                               
  401.            {\unhbox\@voetruimte                                                 
  402.             \ifcase\@voetteller \relax \or \relax \or                           
  403.                                 \hfil \else \hfill \fi                          
  404.             \@refveld{#1}{#2}\hskip0cm plus 3\refveldbreedte}}                  
  405. \def\ps@empty{                                                                  
  406.     \def\@oddhead{}\def\@oddfoot{}                                              
  407.     \def\@evenhead{}\def\@evenfoot{}}                                           
  408. \def\ps@plain{                                                                  
  409.     \def\@oddhead{}\def\@evenhead{}                                             
  410.     \def\@oddfoot{\rm\hfil\thepage}                                             
  411.     \let\@evenfoot=\@oddfoot}                                                   
  412. %% hss omdat de kop en voet te breed zijn.                                      
  413. \def\@hss{\hskip 0cm plus 1filll minus 1filll\relax}                            
  414. \def\ps@headings{                                                               
  415.     \def\@oddhead{\vbox to \@otherheadheight                                    
  416.                       {\vervolghoofd\vfil                                       
  417.                        \if@streepjes\streepjes{\@otherheadheight}\fi}%          
  418.                   \hss}                                                         
  419.     \let\@evenhead=\@oddhead                                                    
  420.     \def\@oddfoot{\voetregel\hss} \let\@evenfoot=\@oddfoot}                     
  421. \def\ps@firstpage{\global\headheight=\@otherheadheight                          
  422.     \global\textheight=\@othertextheight %?? werkt dit ??                       
  423.     \global\headsep=\@otherheadsep                                              
  424.     \def\@oddhead{\vbox to \@firstheadheight                                    
  425.                       {\briefhoofd\vfil                                         
  426.                        \if@streepjes\streepjes{\@firstheadheight}\fi}%          
  427.                   \hss}                                                         
  428.     \def\@evenhead{}                                                            
  429.     \def\@oddfoot{\voetregel\hss} \let\@evenfoot=\@oddfoot}                     
  430.                                                                                 
  431. \ps@headings                                                                    
  432.                                                                                 
  433. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%% vouwstreepjes %%%%%%%%%%%%%%%%%%%%%%%%%%         
  434. %% momenteel alleen envelop EN-DL-V geimplementeerd                             
  435. \def\streepje{\hbox to 2mm{\hrulefill}}                                         
  436. \def\streepjes#1{\vbox to 0cm                                                   
  437.          {\kern-#1 %% dit brengt ons bovenin het briefhoofd, 13mm onder         
  438.           \hbox to \textwidth                 %% de rand van het papier         
  439.              {\llap{\perfstreepje\kern24mm}\hfill %% 7mm van rand op 33mm       
  440.               \rlap{\kern24mm\vouwstreepjes}}     %% 7mm van rand op 33mm       
  441.           \vss}}                              %% zie textwidth boven.           
  442. \def\perfstreepje {\vtop{\kern\z@                                               
  443.                          \kern 135mm %% 297/2 - 13                              
  444.                          \streepje}}                                            
  445. \def\vouwstreepjes{\vtop{\kern\z@                                               
  446.                          \kern 92mm %% 105-13                                   
  447.                          \streepje  %% denk maar dat dit geen dikte heeft       
  448.                          \kern 50mm %% 155-150                                  
  449.                          \streepje}}                                            
  450. %%%%%%%%%%%%%%%%%%%%%%%%%%%% lists %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%               
  451. % overgenomen uit 'artikel3'                                                    
  452. \def\@listi{\leftmargin\leftmargini                                             
  453.             \labelsep=.5em                                                      
  454.             \labelwidth=\leftmargin \advance\labelwidth by -\labelsep           
  455.  \topsep=-.5\parskip plus 1pt %V half the amount of white around lists          
  456.  \parsep \z@ %V defaults added                                                  
  457.  \itemsep \parsep}    %V defaults added                                         
  458. \def\@listii{\leftmargin\leftmarginii \labelsep=.5em                            
  459.  \labelwidth\leftmarginii\advance\labelwidth-\labelsep                          
  460.  \topsep=-.5\parskip plus 1pt %V half the amount of white around lists          
  461.  \parsep \z@ %V zeroed                                                          
  462.  \itemsep \parsep}                                                              
  463. \def\@listiii{\leftmargin\leftmarginiii \labelsep=.5em                          
  464.  \labelwidth\leftmarginiii\advance\labelwidth-\labelsep                         
  465.  \topsep=-.5\parskip plus 1pt %V half the amount of white around lists          
  466.  \parsep \z@                                                                    
  467.  \partopsep \z@ %V zeroed                                                       
  468.  \itemsep \topsep}                                                              
  469. \def\@listiv{\leftmargin\leftmarginiv \labelsep=.5em                            
  470.  \topsep=-.5\parskip plus 1pt %V half the amount of white around lists          
  471.  \labelwidth\leftmarginiv\advance\labelwidth-\labelsep}                         
  472. \def\@listv{\leftmargin\leftmarginv \labelsep=.5em                              
  473.  \topsep=-.5\parskip plus 1pt %V half the amount of white around lists          
  474.  \labelwidth\leftmarginv\advance\labelwidth-\labelsep}                          
  475. \def\@listvi{\leftmargin\leftmarginvi \labelsep=.5em                            
  476.  \topsep=-.5\parskip plus 1pt %V half the amount of white around lists          
  477.  \labelwidth\leftmarginvi\advance\labelwidth-\labelsep}                         
  478.                                                                                 
  479. \leftmargini 2.5em                                                              
  480. \leftmarginii 2.2em \leftmarginiii 1.87em                                       
  481. \leftmarginiv 1.7em \leftmarginv 1em                                            
  482. \leftmarginvi 1em                                                               
  483. \leftmargin\leftmargini                                                         
  484. \labelwidth\leftmargini\advance\labelwidth-\labelsep                            
  485. \labelsep 5pt                                                                   
  486. \parsep 0pt                                                                     
  487.                                                                                 
  488. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% varia %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%       
  489. \parskip .7em plus .3em minus .2em                                              
  490. \parindent 0pt \topsep .4em \partopsep 0pt \itemsep .4em                        
  491. \@lowpenalty 51 \@medpenalty 151 \@highpenalty 301                              
  492. \@beginparpenalty -\@lowpenalty \@endparpenalty -\@lowpenalty \@itempenalty     
  493. -\@lowpenalty                                                                   
  494.                                                                                 
  495.                                                                                 
  496. \def\labelenumi{\arabic{enumi}.}                                                
  497. \def\theenumi{\arabic{enumi}}                                                   
  498. \def\labelenumii{(\alph{enumii})}                                               
  499. \def\theenumii{\alph{enumii}}                                                   
  500. \def\p@enumii{\theenumi}                                                        
  501. \def\labelenumiii{\roman{enumiii}.}                                             
  502. \def\theenumiii{\roman{enumiii}}                                                
  503. \def\p@enumiii{\theenumi(\theenumii)}                                           
  504. \def\labelenumiv{\Alph{enumiv}.}                                                
  505. \def\theenumiv{\Alph{enumiv}}                                                   
  506. \def\p@enumiv{\p@enumiii\theenumiii}                                            
  507.                                                                                 
  508. \def\labelitemi{$\bullet$}                                                      
  509. \def\labelitemii{\bf --}                                                        
  510. \def\labelitemiii{$\ast$}                                                       
  511. \def\labelitemiv{$\cdot$}                                                       
  512. \def\verse{\let\\=\@centercr                                                    
  513.  \list{}{\itemsep\z@ \itemindent -15pt\listparindent \itemindent                
  514.  \rightmargin\leftmargin\advance\leftmargin 15pt}\item[]}                       
  515. \let\endverse\endlist                                                           
  516. \def\quotation{\list{}{\listparindent 1.5em                                     
  517.  \itemindent\listparindent                                                      
  518.  \rightmargin\leftmargin}\item[]}                                               
  519. \let\endquotation=\endlist                                                      
  520. \def\quote{\list{}{\rightmargin\leftmargin}\item[]}                             
  521. \let\endquote=\endlist                                                          
  522.                                                                                 
  523. \def\descriptionlabel#1{\hspace\labelsep \bf #1}                                
  524. \def\description{\list{}{\labelwidth\z@ \itemindent-\leftmargin                 
  525.  \let\makelabel\descriptionlabel}}                                              
  526. \let\enddescription\endlist                                                     
  527.                                                                                 
  528.                                                                                 
  529. \def\theequation{\arabic{equation}}                                             
  530.                                                                                 
  531. \arraycolsep 5pt \tabcolsep 6pt \arrayrulewidth .4pt \doublerulesep 2pt         
  532. \tabbingsep \labelsep                                                           
  533. \skip\@mpfootins = \skip\footins                                                
  534. \fboxsep = 3pt \fboxrule = .4pt                                                 
  535.                                                                                 
  536. \def\footnoterule{\kern-1\p@                                                    
  537.  \hrule width .4\columnwidth                                                    
  538.  \kern .6\p@}                                                                   
  539.                                                                                 
  540. \long\def\@makefntext#1{\noindent                                               
  541.     \hbox to \leftmargini{${\@thefnmark}$.\hfil}#1}                             
  542.                                                                                 
  543.                                                                                 
  544. \c@topnumber=2                                                                  
  545. \def\topfraction{.7}                                                            
  546. \c@bottomnumber=1                                                               
  547. \def\bottomfraction{.3}                                                         
  548. \c@totalnumber=3                                                                
  549. \def\textfraction{.2}                                                           
  550. \def\floatpagefraction{.5}                                                      
  551. \c@dbltopnumber= 2                                                              
  552. \def\dbltopfraction{.7}                                                         
  553. \def\dblfloatpagefraction{.5}                                                   
  554.                                                                                 
  555.                                                                                 
  556. \smallskipamount=.5\parskip \medskipamount=\parskip                             
  557. \bigskipamount=2\parskip                                                        
  558. \pagenumbering{arabic} \onecolumn \@fileswfalse                                 
  559.                                                                                 
  560. %%%%%%%%%%%%%%%%%%%%%%%%%% labels %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%             
  561. \def\startlabels{\labelcount=0 \baselineskip=0pt \lineskip=0pt                  
  562. \pagestyle{empty}                                                               
  563. \let\@texttop=\relax                                                            
  564. \topmargin -50pt                                                                
  565. \headsep 0pt                                                                    
  566. \oddsidemargin -35pt                                                            
  567. \evensidemargin -35pt                                                           
  568. \textheight 10in                                                                
  569. \@colht\textheight \@colroom\textheight \vsize\textheight                       
  570. \textwidth 550pt                                                                
  571. \columnsep 25pt                                                                 
  572. \xpt                                                                            
  573. \baselineskip=0pt                                                               
  574. \lineskip=0pt                                                                   
  575. \boxmaxdepth=0pt                                                                
  576. \twocolumn\relax}                                                               
  577. \def\mlabel#1#2{\setbox0\vbox{\parbox[b]{3.6in}{\strut\ignorespaces #2}}        
  578.  \vbox to 2in{\vss \box0 \vss}}                                                 
  579.                                                                                 
  580. %%%%%%%%%%%%%%%%%%%%%%%%%%% talen %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%               
  581. \ifcase\b@language % 0: Nederlands                                              
  582.    \def\uwbrieftekst{Uw brief van}                                              
  583.    \def\uwkenmerktekst{Uw kenmerk}                                              
  584.    \def\onskenmerktekst{Ons kenmerk}                                            
  585.    \def\datumtekst{Datum}                                                       
  586.    \def\geadresseerdetekst{Geadresseerde}                                       
  587.    \def\bladnummertekst{Bladnummer}                                             
  588.    \def\vandaag{\number\day~\ifcase\month\or                                    
  589.      januari\or februari\or maart\or april\or mei\or juni\or juli\or            
  590.      augustus\or september\or oktober\or november\or december\fi                
  591.      \space \number\year}                                                       
  592.    \def\betrefttekst{Onderwerp:}                                                
  593.    \def\bijlagetekst{Bijlage:}                                                  
  594.    \def\bijlagentekst{Bijlagen:}                                                
  595.    \def\telefoontekst{telefoon}                                                 
  596. \or % 1: Engels                                                                 
  597.    \def\uwbrieftekst{Your letter of}                                            
  598.    \def\uwkenmerktekst{Your reference}                                          
  599.    \def\onskenmerktekst{Our reference}                                          
  600.    \def\datumtekst{Date}                                                        
  601.    \def\geadresseerdetekst{To}                                                  
  602.    \def\bladnummertekst{Page}                                                   
  603.    \def\vandaag{\ifcase\day\or                                                  
  604.        1st\or 2nd\or 3rd\or 4th\or 5th\or                                       
  605.        6th\or 7th\or 8th\or 9th\or 10th\or                                      
  606.        11th\or 12th\or 13th\or 14th\or 15th\or                                  
  607.        16th\or 17th\or 18th\or 19th\or 20th\or                                  
  608.        21st\or 22nd\or 23rd\or 24th\or 25th\or                                  
  609.        26th\or 27th\or 28th\or 29th\or 30th\or                                  
  610.        31st\fi~\ifcase\month\or                                                 
  611.        January\or February\or March\or April\or May\or June\or                  
  612.        July\or August\or September\or October\or November\or December\fi        
  613.        \space \number\year}                                                     
  614.    \def\betrefttekst{Re:}                                                       
  615.    \def\bijlagetekst{Enclosure:}                                                
  616.    \def\bijlagentekst{Enclosures:}                                              
  617.    \def\telefoontekst{telephone}                                                
  618. \or % 2: Amerikaans                                                             
  619.    \def\uwbrieftekst{Your letter of}                                            
  620.    \def\uwkenmerktekst{Your reference}                                          
  621.    \def\onskenmerktekst{Our reference}                                          
  622.    \def\datumtekst{Date}                                                        
  623.    \def\geadresseerdetekst{To}                                                  
  624.    \def\bladnummertekst{Page}                                                   
  625.    \def\vandaag{\ifcase\month\or                                                
  626.      January\or February\or March\or April\or May\or June\or                    
  627.      July\or August\or September\or October\or November\or December\fi          
  628.      \space\number\day, \number\year}                                           
  629.    \def\betrefttekst{Re:}                                                       
  630.    \def\bijlagetekst{Enclosure:}                                                
  631.    \def\bijlagentekst{Enclosures:}                                              
  632.    \def\telefoontekst{telephone}                                                
  633. \or % 3: Duits                                                                  
  634.    \def\uwbrieftekst{Ihr Brief vom}                                             
  635.    \def\uwkenmerktekst{Ihr Zeichen}                                             
  636.    \def\onskenmerktekst{Unser Zeichen}                                          
  637.    \def\datumtekst{Datum}                                                       
  638.    \def\geadresseerdetekst{An}                                                  
  639.    \def\bladnummertekst{Seite}                                                  
  640.    \def\vandaag{\number\day.~\ifcase\month\or                                   
  641.      Januar\or Februar\or M\"arz\or April\or Mai\or Juni\or                     
  642.      Juli\or August\or September\or Oktober\or November\or Dezember\fi          
  643.      \space\number\year}                                                        
  644.    \def\betrefttekst{Betrifft:}                                                 
  645.    \def\bijlagetekst{Anlage:}                                                   
  646.    \def\bijlagentekst{Anlagen:}                                                 
  647.    \def\telefoontekst{Telefon}                                                  
  648. \or % 4: Frans                                                                  
  649.    \def\uwbrieftekst{Votre lettre du}                                           
  650.    \def\uwkenmerktekst{Vos r\'ef\'erences:}                                     
  651.    \def\onskenmerktekst{Nos r\'ef\'erences:}                                    
  652.    \def\datumtekst{Date:}                                                       
  653.    \def\geadresseerdetekst{\`A l'attention de}                                  
  654.    \def\bladnummertekst{Page}                                                   
  655.    \def\vandaag{\number\day\ifnum\day=1$^{er}$\fi                               
  656.           ~\ifcase\month\or janvier\or                                          
  657.            f\'evrier\or mars\or avril\or mai\or juin\or                         
  658.            juillet\or ao\^ut\or septembre\or octobre\or                         
  659.            novembre\or d\'ecembre\fi \space \number\year}                       
  660.    \def\betrefttekst{Objet:}                                                    
  661.    \def\bijlagetekst{Pi\`ece jointe:}                                           
  662.    \def\bijlagentekst{Pi\`eces jointes:}                                        
  663.    \def\telefoontekst{T\'el\'ephone:}                                           
  664. \fi                                                                             
  665.                                                                                 
  666. %% and finally, muchos against my will, emulation of original                   
  667. %% LaTeX letter style.                                                          
  668. \let\letter=\brief \let\endletter=\endbrief                                     
  669. \let\closing=\afsluiting                                                        
  670. \def\signature{\ondertekening}                                                  
  671. \let\encl=\bijlagen                                                             
  672. \def\address#1{\maakbriefhoofd*{}{#1}}                                          
  673. \let\re=\betreft                                                                
  674.                                                                                 
  675. %% with english translations of extra commands                                  
  676. \let\footitem=\voetitem                                                         
  677.                                                                                 
  678. \endinput                                                                       
  679.